home *** CD-ROM | disk | FTP | other *** search
/ My Neighborhood / My Neighborhood.iso / mac / MacFiles / Grandma.Dxr / 00072.ls < prev    next >
Encoding:
Text File  |  1997-11-18  |  864 b   |  33 lines
  1. on exitFrame
  2.   global tumbling, goingUp
  3.   if tumbling then
  4.     if the volume of sound 1 = 70 then
  5.       set the volume of sound 1 to 255
  6.       puppetSound("slow boing.s")
  7.       updateStage()
  8.     end if
  9.     set the castNum of sprite 13 to the castNum of sprite 13 + 1
  10.     updateStage()
  11.     if the name of cast the castNum of sprite 13 = "a3" then
  12.       set tumbling to 0
  13.     end if
  14.   else
  15.     if goingUp then
  16.       if the volume of sound 1 = 70 then
  17.         set the volume of sound 1 to 255
  18.         puppetSound("Echo Gling.S")
  19.         updateStage()
  20.       end if
  21.       set the castNum of sprite 13 to the castNum of sprite 13 - 1
  22.       updateStage()
  23.       if the name of cast the castNum of sprite 13 = "a1" then
  24.         set goingUp to 0
  25.       end if
  26.     end if
  27.   end if
  28.   if not soundBusy(1) then
  29.     set the volume of sound 1 to 70
  30.     puppetSound(0)
  31.   end if
  32. end
  33.